pascal if

visit shbcf.ru